function [ poblacion ] = InitialPopulationRandom(Poblacionnicial,tablacombinaciones_ind,cartera)%entrada debe ser tabla de RatioMCIM descend
%INITIALPOPULATION Summary of this function goes here
%   Detailed explanation goes here
%Abre workers para paralelizar
%Abre workers para paralelizar
if matlabpool('size') ==0 % 4 workers
    matlabpool
end



numeroSistemas2 = length(tablacombinaciones_ind(:,1));


subdivisiones(1:6,2) = ceil(numeroSistemas2/6);

if sum(subdivisiones(:,2))~=numeroSistemas2
    subdivisiones(end,2)=numeroSistemas2-sum(subdivisiones(2:6,2));
end

poblacion1=zeros(1,1,'uint16');

poblacion = zeros(Poblacionnicial,1,'uint16');

for parametro=1:cartera
parfor habitante=1:Poblacionnicial
    
            numeroSuerte2=rand;
            if numeroSuerte2<0.56 %primer grupo mas posiblidades
                
                fila=randi(subdivisiones(1,2));
                poblacion1(habitante)=fila;

            end
            if numeroSuerte2>0.56 && numeroSuerte2<0.8 %segundo grupo mas posiblidades
                fila=randi(subdivisiones(2,2))+subdivisiones(1,2);            
                poblacion1(habitante)=fila;
            end
            if numeroSuerte2>0.8 && numeroSuerte2<0.905 
                fila=randi(subdivisiones(3,2))+subdivisiones(1,2)+subdivisiones(2,2);             
                poblacion1(habitante)=fila;
            end
            if numeroSuerte2>0.905 && numeroSuerte2<0.95 
                fila=randi(subdivisiones(4,2))+subdivisiones(1,2)+subdivisiones(2,2)+subdivisiones(3,2);          
                poblacion1(habitante)=fila;
            end
            if numeroSuerte2>0.95 && numeroSuerte2<0.985 
                fila=randi(subdivisiones(5,2))+subdivisiones(1,2)+subdivisiones(2,2)+subdivisiones(3,2)+subdivisiones(4,2);            
                poblacion1(habitante)=fila;
            end
            if numeroSuerte2>0.985 && numeroSuerte2<1 
                if subdivisiones(6,2)~=0
                    fila=randi(subdivisiones(6,2))+subdivisiones(1,2)+subdivisiones(2,2)+subdivisiones(3,2)+subdivisiones(4,2)+subdivisiones(5,2);         
                else
                    fila=randi(subdivisiones(5,2))+subdivisiones(1,2)+subdivisiones(2,2)+subdivisiones(3,2)+subdivisiones(4,2); 
                end
                
                poblacion1(habitante)=fila;
            end
end
    poblacion=[poblacion1' poblacion];
    
            
end    
poblacion(:,cartera+1)=[];
%             %Parametro 2
% parfor habitante=1:Poblacionnicial
%             numeroSuerte2=rand;
%             if numeroSuerte2<0.56 %primer grupo mas posiblidades
%                 fila=randi(subdivisiones(1,2));
%                 poblacion2(habitante)=fila;
% 
%             end
%             if numeroSuerte2>0.56 && numeroSuerte2<0.8 %segundo grupo mas posiblidades
%                 fila=randi(subdivisiones(2,2))+subdivisiones(1,2);            
%                 poblacion2(habitante)=fila;
%             end
%             if numeroSuerte2>0.8 && numeroSuerte2<0.905 
%                 fila=randi(subdivisiones(3,2))+subdivisiones(1,2)+subdivisiones(2,2);             
%                 poblacion2(habitante)=fila;
%             end
%             if numeroSuerte2>0.905 && numeroSuerte2<0.95 
%                 fila=randi(subdivisiones(4,2))+subdivisiones(1,2)+subdivisiones(2,2)+subdivisiones(3,2);          
%                 poblacion2(habitante)=fila;
%             end
%             if numeroSuerte2>0.95 && numeroSuerte2<0.985 
%                 fila=randi(subdivisiones(5,2))+subdivisiones(1,2)+subdivisiones(2,2)+subdivisiones(3,2)+subdivisiones(4,2);            
%                 poblacion2(habitante)=fila;
%             end
%             if numeroSuerte2>0.985 && numeroSuerte2<1 
%                 fila=randi(subdivisiones(6,2))+subdivisiones(1,2)+subdivisiones(2,2)+subdivisiones(3,2)+subdivisiones(4,2)+subdivisiones(5,2);         
%                 poblacion2(habitante)=fila;
%             end
%             
% end            
%             %Parametro 3
% parfor habitante=1:Poblacionnicial
%             numeroSuerte2=rand;
%             if numeroSuerte2<0.56 %primer grupo mas posiblidades
%                 fila=randi(subdivisiones(1,2));
%                 poblacion3(habitante)=fila;
% 
%             end
%             if numeroSuerte2>0.56 && numeroSuerte2<0.8 %segundo grupo mas posiblidades
%                 fila=randi(subdivisiones(2,2))+subdivisiones(1,2);            
%                 poblacion3(habitante)=fila;
%             end
%             if numeroSuerte2>0.8 && numeroSuerte2<0.905 
%                 fila=randi(subdivisiones(3,2))+subdivisiones(1,2)+subdivisiones(2,2);             
%                 poblacion3(habitante)=fila;
%             end
%             if numeroSuerte2>0.905 && numeroSuerte2<0.95 
%                 fila=randi(subdivisiones(4,2))+subdivisiones(1,2)+subdivisiones(2,2)+subdivisiones(3,2);          
%                 poblacion3(habitante)=fila;
%             end
%             if numeroSuerte2>0.95 && numeroSuerte2<0.985 
%                 fila=randi(subdivisiones(5,2))+subdivisiones(1,2)+subdivisiones(2,2)+subdivisiones(3,2)+subdivisiones(4,2);            
%                 poblacion3(habitante)=fila;
%             end
%             if numeroSuerte2>0.985 && numeroSuerte2<1 
%                 fila=randi(subdivisiones(6,2))+subdivisiones(1,2)+subdivisiones(2,2)+subdivisiones(3,2)+subdivisiones(4,2)+subdivisiones(5,2);         
%                 poblacion3(habitante)=fila;
%             end
%             
% end            
%   %Parametro 4
% parfor habitante=1:Poblacionnicial
%             numeroSuerte2=rand;
%             if numeroSuerte2<0.56 %primer grupo mas posiblidades
%                 fila=randi(subdivisiones(1,2));
%                 poblacion4(habitante)=fila;
% 
%             end
%             if numeroSuerte2>0.56 && numeroSuerte2<0.8 %segundo grupo mas posiblidades
%                 fila=randi(subdivisiones(2,2))+subdivisiones(1,2);            
%                 poblacion4(habitante)=fila;
%             end
%             if numeroSuerte2>0.8 && numeroSuerte2<0.905 
%                 fila=randi(subdivisiones(3,2))+subdivisiones(1,2)+subdivisiones(2,2);             
%                 poblacion4(habitante)=fila;
%             end
%             if numeroSuerte2>0.905 && numeroSuerte2<0.95 
%                 fila=randi(subdivisiones(4,2))+subdivisiones(1,2)+subdivisiones(2,2)+subdivisiones(3,2);          
%                 poblacion4(habitante)=fila;
%             end
%             if numeroSuerte2>0.95 && numeroSuerte2<0.985 
%                 fila=randi(subdivisiones(5,2))+subdivisiones(1,2)+subdivisiones(2,2)+subdivisiones(3,2)+subdivisiones(4,2);            
%                 poblacion4(habitante)=fila;
%             end
%             if numeroSuerte2>0.985 && numeroSuerte2<1 
%                 fila=randi(subdivisiones(6,2))+subdivisiones(1,2)+subdivisiones(2,2)+subdivisiones(3,2)+subdivisiones(4,2)+subdivisiones(5,2);         
%                 poblacion4(habitante)=fila;
%             end
%             
% end            
%   poblacion=[poblacion1',poblacion2',poblacion3',poblacion4'];          
end

    




